www.gusucode.com > 云网互动影视系统(12套模版和资源联盟) 6.2 > 云网互动影视系统(12套模版和资源联盟) 6.2.4/免费版/PlayPower.asp
<!--#include file="player.asp" --> <html> <head> <title>无延迟播放器</title> <style type="text/css"> <!-- body,td,th { font-size: 12px; color: #FFFFFF; } --> </style> <script language="javascript"> function GetPlayerVersion() { try{ var Player; var ret; Player = new ActiveXObject("VodHelper.NetPlayer"); ret = Player.GetCurrentVersion(); if(ret < 3.74) { alert("网络媒体播放器版本已过期,请重新下载并安装网络媒体播放器!"); document.location.href = "./down/vodplayer.exe"; return false; } delete Player; } catch(e) { alert("请首先下载安装网络媒体播放器!"); document.location.href = "../down/vodplayer.exe"; return false; } } </script> </head> <body oncontextmenu="return false;" onselectstart="return false" ondragstart="return false" onLoad="javascript:GetPlayerVersion();" onkeydown="if(event.keyCode==78 && event.ctrlKey) return false;" leftMargin=0 topMargin=0 rightmargin=0 bottommargin=0> <% '=================================================================================================================== '软件名称:云网影视管理系统 'Copyright (C) 2002-2007 ywnt.net All rights reserved. '产品咨询QQ:489234,2813712 '程序版权:云网互动科技有限公司 '程序开发:云网互动科技有限公司 '官方网站:http://www.ywnt.net '郑重声明: ' 1、免费版本请在程序首页保留版权信息,并做上本站LOGO友情连接,商业版本无此要求; ' 2、任何个人或组织不得在授权允许的情况下删除、修改、拷贝本软件及其他副本上一切关于版权的信息; ' 3、云网互动科技有限公司保留此软件的法律追究权利 '=================================================================================================================== Set RS=Server.CreateObject(YWNT_TMS_RS) SQL="select ID,DxUrl,CncUrl,TtUrl from YWNT_TMS_Sever Where ID="&SeverID Rs.open sql,Conn,1,1 If Not RS.Eof Then SeverUrl=RS.GetRows() End If RS.Close Set RS = Nothing Set RS=Server.CreateObject(YWNT_TMS_RS) SQL="select MovieUrl from YWNT_TMS_MovieUrl Where ID="&UrlID Rs.open sql,Conn,1,1 If Not RS.Eof Then MovieUrl=RS("MovieUrl") End If RS.Close Set RS = Nothing%> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td height="10" colspan="3"><table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="37"><img src="play/player_03.gif" width="37" height="27" alt="" /></td> <td width="900" background="play/player_04.gif"></td> <td width="104"><img src="play/player_06.gif" width="104" height="27" alt="" /></td> </tr> </table></td> </tr> <tr> <td width="8" height="100%" background="play/player_08.gif"></td> <td width="100%" valign="top" bgcolor="#000000"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="959" height="27" background="play/player_10.jpg"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td width="91%">影片:<%=MovieName%></td> <td width="9%"><img src="play/player_16.gif" width="75" height="20" alt="全屏播放" style="CURSOR: hand" onClick="SetFullScreen()"/></td> </tr> </table></td> </tr> <tr> <td valign="top" height="100%"> <%FileExt = LCase(Mid(MovieUrl, InStrRev(MovieUrl, ".") + 1)) Select Case FileExt Case "flv","swf" call FlashPlayer() Case else call PowerPlayer() End Select Sub PowerPlayer()%> <script language="JavaScript" type="text/javascript"> function SetFullScreen() { if (player.playState == 3){ alert("还原窗口请按键盘左上角[ESC]"); player.fullscreen=1; }else{ alert("影片开始播放后才可以全屏播放."); } } </script> <object id="ActiveX" name="player" classid="CLSID:C3D8F2C7-A508-4724-BC3A-C247058D17EB" width="100%" height="100%" viewastext="VIEWASTEXT"> <param name="url" value="<%=SeverUrl(Request.QueryString("SeverType"),0)&MovieUrl%>" /> <param name="uimode" value="1" /> <param name="playmode" value="1" /> <param name="autostart" value="1" /> <param name="playinplayer" value="0"> <param name="keephistory" value="0"> </object> <%end sub sub FlashPlayer()%> <script type="text/javascript"> var swf_width="100%" var swf_height="100%" var texts='<%=MovieName%>' var files='<%=SeverUrl(Request.QueryString("SeverType"),0)&MovieUrl%>' document.write('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ swf_width +'" height="'+ swf_height +'">'); document.write('<param name="movie" value="Play/vcastr22.swf"><param name="quality" value="high">'); document.write('<param name="menu" value="false"><param name="allowFullScreen" value="true" />'); document.write('<param name="FlashVars" value="vcastr_file='+files+'&vcastr_title='+texts+'&IsAutoPlay=1">'); document.write('<embed src="Play/vcastr22.swf" allowFullScreen="true" FlashVars="vcastr_file='+files+'&vcastr_title='+texts+'&IsAutoPlay=1" menu="false" quality="high" width="'+ swf_width +'" height="'+ swf_height +'" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />'); document.write('</object>'); </script> <%end sub%></td> </tr> </table></td> <td width="8" background="play/player_12.gif"></td> </tr> <tr> <td height="10" valign="top"><img src="play/player_20.gif" width="8" height="10" alt="" /></td> <td height="10" background="play/player_22.gif"></td> <td height="10" valign="top"><img src="play/player_24.gif" width="8" height="10" alt="" /></td> </tr> </table> <%call connclose()%> </body> </html>